home *** CD-ROM | disk | FTP | other *** search
/ Enter 2010 January / ENTER_2010_01.iso / Programy / Gry / Base_Invaders_ / BaseInvadersSetup1.3.exe / {app} / Scripts / PhysPresent.lua < prev    next >
Encoding:
Text File  |  2007-01-25  |  1.8 KB  |  66 lines
  1. G.File( "Data/BasicCamera.xml");
  2.  
  3. --G.FullScreen( true );
  4.  
  5.  
  6.  
  7. function WaitForSpaceBar(  )
  8.     coroutine.yield();        
  9.     while( not G.KeyTriggered( "Space")  ) do    
  10.         coroutine.yield();    
  11.     end
  12. end
  13.  
  14.     --G.File( "MenuData/TraitorCog.xml" );
  15.     --G.File( "MenuData/MainMenuCog.xml" );
  16.     
  17. function MainPresentation()
  18.  
  19.     G.ActivateBackground( 0 );
  20.     G.File( "GUI/SlideCog.xml" );
  21.  
  22.     Slide.SetGuiText( "Title" , "Physics Presentation"  , 0 );    
  23.     Slide.SetGuiText( "Text" , "Matt Miner & Chris Peters"  , 0 );        
  24.         
  25.     WaitForSpaceBar();
  26.         
  27.     Slide.SetGuiText( "Title" , "The Plan"  , 0 );    
  28.     Slide.SetGuiText( "Text" , "- Spring System\n- Physics Improvements\n- SuperSticky Ball"  , 5 );
  29.  
  30.     WaitForSpaceBar();
  31.         
  32.     Slide.SetGuiText( "Title" , "Spring System"  , 0 );    
  33.     Slide.SetGuiText( "Text" , "Result: Invader Capes!"  , 5 );
  34.     Slide.SetGuiText( "Text" , "\n Problems: - Very Springy\n Success: Verlet, Absolute Contstraints" , -1 );
  35.     
  36.         
  37.     WaitForSpaceBar();
  38.         
  39.     Slide.SetGuiText( "Title" , "Physics Improvements"  , 0 );    
  40.     Slide.SetGuiText( "Text" , "Result: Improved Physics Speed"  , 5 );        
  41.     Slide.SetGuiText( "Text" , "\n Problems: - Time Consuming\n Success: Reduced Variable Creation, \n Improved Rotational Calculations"  , -1 );            
  42.     
  43.     WaitForSpaceBar();
  44.  
  45.  
  46.     Slide.SetGuiText( "Title" , "SuperSticky Ball"  , 0 );    
  47.     Slide.SetGuiText( "Text" , "Result: Work in Progress"  , 5 );            
  48.     Slide.SetGuiText( "Text" , "\n Problems: - Too many Forces, \nMultiple simultaneous Collisions, \nPoor with terrain\n"  , -1 );    
  49.         
  50.     WaitForSpaceBar();
  51.     
  52.     Slide.SetGuiText( "Title" , "And Now the Demo"  , 0 );    
  53.     Slide.SetGuiText( "Text" , ""  , 5 );
  54.     
  55.     WaitForSpaceBar();
  56.         
  57.     Slide.Destroy();
  58.     
  59. end
  60.  
  61. CreateCoroutine( MainPresentation );
  62.  
  63. -- dofile( "Scripts/Startup.lua" )    
  64.  
  65.  
  66.